home *** CD-ROM | disk | FTP | other *** search
/ Games of Daze / Infomagic - Games of Daze (Summer 1995) (Disc 1 of 2).iso / djgpp / diffs / gcc-263 / config / msdos / mklibgcc.c < prev    next >
Encoding:
Text File  |  1995-01-18  |  2.1 KB  |  104 lines
  1. *** orig/gcc-263/config/msdos/mklibgcc.c    Sat Dec 17 18:00:58 1994
  2. --- src/gcc-263/config/msdos/mklibgcc.c    Sat Dec 17 18:39:56 1994
  3. ***************
  4. *** 0 ****
  5. --- 1,98 ----
  6. + #include <stdio.h>
  7. + #include <string.h>
  8. + #include <dirent.h>
  9. + 
  10. + char *skips[] = {
  11. +   "__main",
  12. +   "_ctors",
  13. +   "_exit",
  14. +   "_ctor_list",
  15. +   "_dtor_list",
  16. +   0
  17. + };
  18. + 
  19. + int
  20. + do_clean()
  21. + {
  22. +   DIR *dir;
  23. +   struct dirent *de;
  24. +   remove("mklibnow.bat");
  25. + 
  26. +   dir = opendir("lgcctmp");
  27. +   if (!dir)
  28. +     return 0;
  29. +   while ((de=readdir(dir)))
  30. +   {
  31. +     char buf[30];
  32. +     if (de->d_name[0] == '.')
  33. +       continue;
  34. +     sprintf(buf, "lgcctmp/%s", de->d_name);
  35. +     unlink(buf);
  36. +   }
  37. +   closedir(dir);
  38. +   return 0;
  39. + }
  40. + 
  41. + int
  42. + main(int argc, char **argv)
  43. + {
  44. +   char *cc = argv[1];
  45. +   char *csrc=argv[2];
  46. +   int i;
  47. +   FILE *batfile;
  48. +   FILE *cfile;
  49. + 
  50. +   if (argc > 1 && strcmp(argv[1], "-c")==0)
  51. +     return do_clean();
  52. + 
  53. +   mkdir("lgcctmp", 0755);
  54. + 
  55. +   batfile = fopen("mklibnow.bat", "a");
  56. +   if (!batfile)
  57. +   {
  58. +     perror("mklibnow.bat");
  59. +     return 1;
  60. +   }
  61. +   fprintf(batfile, "@echo off\n");
  62. + 
  63. +   for (i=3; i<argc; i++)
  64. +   {
  65. +     char basename[30], *bp;
  66. +     int s;
  67. +     for (s=0; skips[s]; s++)
  68. +       if (strcmp(skips[s], argv[i]) == 0)
  69. +     break;
  70. +     if (skips[s])
  71. +       continue;
  72. +     strcpy(basename, "lgcctmp/");
  73. +     if (strncmp(argv[i], "_fix", 4)==0)
  74. +     {
  75. +       strcat(basename, "fx");
  76. +       strcat(basename, argv[i]+4);
  77. +     }
  78. +     else if (strncmp(argv[i], "_float", 4)==0)
  79. +     {
  80. +       strcat(basename, "flt");
  81. +       strcat(basename, argv[i]+6);
  82. +     }
  83. +     else
  84. +     {
  85. +       strcat(basename, argv[i]);
  86. +     }
  87. +     bp = basename + strlen(basename);
  88. +     fprintf(batfile, "%s -c %s.c -o %s.o\n", cc, basename, basename);
  89. +     strcpy(bp, ".c");
  90. +     cfile = fopen(basename, "w");
  91. +     if (cfile)
  92. +     {
  93. +       *bp = 0;
  94. +       fprintf(cfile, "#define L%s\n#include \"%s\"\n", argv[i], csrc);
  95. +       fclose(cfile);
  96. +     }
  97. +     else
  98. +       perror(basename);
  99. +   }
  100. + 
  101. +   fclose(batfile);
  102. +   return 0;
  103. + }
  104.